home *** CD-ROM | disk | FTP | other *** search
/ Net Power 2000 February / NetCD2.iso / Patch / age / age2cpfix.exe / data / GAMEDATA.DRS / Unnamed File 000034.bina < prev    next >
Encoding:
Text File  |  1999-11-11  |  1.3 KB  |  65 lines
  1. ;UPGRADES & BUILDS RELATED TO OTHER PLAYERS
  2.  
  3. #load-if-defined DIFFICULTY-MODERATE
  4. (load-random
  5.     20    "petersen dip bully"
  6.     5    "petersen dip boomer"
  7.     5    "petersen dip feeder"
  8. )
  9.  
  10. #else
  11.  
  12. (load-random
  13.     10    "petersen dip bully"
  14.     10    "petersen dip boomer"
  15.     10    "petersen dip feeder"
  16. )
  17. #end-if
  18.  
  19.  
  20. ;**************************************
  21. ;TRIBUTE TO ONE ANOTHER
  22. (defrule
  23.     (taunt-detected any-ally 4)
  24.     (wood-amount > 200)
  25.     (not (goal resource-needed WOOD) )
  26. =>
  27.     (release-escrow wood)
  28.     (tribute-to-player this-any-ally wood 100)
  29.     (acknowledge-taunt this-any-ally 4)
  30.     (chat-local-to-self "Tribute wood")
  31. )
  32.  
  33. (defrule
  34.     (taunt-detected any-ally 3)
  35.     (food-amount > 200)
  36.     (not (goal resource-needed FOOD) )
  37. =>
  38.     (release-escrow food)
  39.     (tribute-to-player this-any-ally food 100)
  40.     (acknowledge-taunt this-any-ally 3)
  41.     (chat-local-to-self "Tribute food")
  42. )
  43.  
  44. (defrule
  45.     (goal wonder-attempt NO)
  46.     (taunt-detected any-ally 5)
  47.     (not (goal resource-needed GOLD) )
  48. =>
  49.     (release-escrow gold)
  50.     (tribute-to-player this-any-ally gold 100)
  51.     (acknowledge-taunt this-any-ally 5)
  52.     (chat-local-to-self "Tribute gold")
  53. )
  54.  
  55. (defrule
  56.     (taunt-detected any-ally 6)
  57.     (stone-amount > 200)
  58.     (not (goal resource-needed STONE) )
  59. =>
  60.     (release-escrow stone)
  61.     (tribute-to-player this-any-ally stone 100)
  62.     (acknowledge-taunt this-any-ally 6)
  63. )
  64.  
  65.